home *** CD-ROM | disk | FTP | other *** search
/ Ham Radio 2000 #1 / Ham Radio 2000.iso / ham2000 / tcp_ip / ka9q / kit_src / scrn01.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-09-03  |  7.6 KB  |  217 lines
  1. /*    (C) Copyright 1991 Dave Fritsche (wb8zxu), All Rights Reserved.
  2.  * 
  3.  *    Redistribution and use in source and binary forms are permitted for
  4.  *    non-commercial use, provided that the above copyright notice and this
  5.  *    paragraph are duplicated in all such forms.  THIS SOFTWARE IS PROVIDED
  6.  *    ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING,
  7.  *    WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND
  8.  *    FITNESS FOR A PARTICULAR PURPOSE.
  9.  */
  10. #include <stdio.h>
  11. #include "screen.h"
  12.  
  13. int scrn01()
  14. {
  15. /* field 1 */
  16.     tx[0] = 2;    ty[0] = 6;    tsa[0] = 1;    tfa[0] = 0;
  17.     strcpy(title[0], "Your full name:");
  18.     ix[0] = 19;    iy[0] = 6;    isa[0] = 7;    ifa[0] = 0;
  19.     strcpy(iif[0], "                                        ");
  20.     strcpy(ift[0], "****************************************");
  21.     strcpy(ifd[0], "                                        ");
  22.     up[0] = 1;    dn[0] = 2;    l[0] = 1;    r[0] = 2;
  23.     rmask[0] = 127;
  24. /* field 2 */
  25.     tx[1] = 2;    ty[1] = 8;    tsa[1] = 1;    tfa[1] = 0;
  26.     strcpy(title[1], "Street address:");
  27.     ix[1] = 19;    iy[1] = 8;    isa[1] = 7;    ifa[1] = 0;
  28.     strcpy(iif[1], "                                        ");
  29.     strcpy(ift[1], "****************************************");
  30.     strcpy(ifd[1], "                                        ");
  31.     up[1] = 1;    dn[1] = 3;    l[1] = 1;    r[1] = 3;
  32.     rmask[1] = 127;
  33. /* field 3 */
  34.     tx[2] = 12;    ty[2] = 9;    tsa[2] = 1;    tfa[2] = 0;
  35.     strcpy(title[2], "City:");
  36.     ix[2] = 19;    iy[2] = 9;    isa[2] = 7;    ifa[2] = 0;
  37.     strcpy(iif[2], "                                        ");
  38.     strcpy(ift[2], "****************************************");
  39.     strcpy(ifd[2], "                                        ");
  40.     up[2] = 2;    dn[2] = 4;    l[2] = 2;    r[2] = 4;
  41.     rmask[2] = 127;
  42. /* field 4 */
  43.     tx[3] = 11;    ty[3] = 10;    tsa[3] = 1;    tfa[3] = 0;
  44.     strcpy(title[3], "State:");
  45.     ix[3] = 19;    iy[3] = 10;    isa[3] = 7;    ifa[3] = 0;
  46.     strcpy(iif[3], "  ");
  47.     strcpy(ift[3], "@@");
  48.     strcpy(ifd[3], "  ");
  49.     up[3] = 3;    dn[3] = 5;    l[3] = 3;    r[3] = 5;
  50.     rmask[3] = 127;
  51. /* field 5 */
  52.     tx[4] = 13;    ty[4] = 11;    tsa[4] = 1;    tfa[4] = 0;
  53.     strcpy(title[4], "Zip:");
  54.     ix[4] = 19;    iy[4] = 11;    isa[4] = 7;    ifa[4] = 0;
  55.     strcpy(iif[4], "     ");
  56.     strcpy(ift[4], "#####");
  57.     strcpy(ifd[4], "     ");
  58.     up[4] = 4;    dn[4] = 6;    l[4] = 4;    r[4] = 6;
  59.     rmask[4] = 127;
  60. /* field 6 */
  61.     tx[5] = 11;    ty[5] = 13;    tsa[5] = 1;    tfa[5] = 0;
  62.     strcpy(title[5], "Phone:");
  63.     ix[5] = 19;    iy[5] = 13;    isa[5] = 7;    ifa[5] = 0;
  64.     strcpy(iif[5], "(   )   -    ");
  65.     strcpy(ift[5], "(###)###-####");
  66.     strcpy(ifd[5], "(   )   -    ");
  67.     up[5] = 5;    dn[5] = 11;    l[5] = 5;    r[5] = 11;
  68.     rmask[5] = 127;
  69. /* field 7 */
  70.     tx[6] = 46;    ty[6] = 15;    tsa[6] = 1;    tfa[6] = 0;
  71.     strcpy(title[6], "Callsign:");
  72.     ix[6] = 57;    iy[6] = 15;    isa[6] = 7;    ifa[6] = 0;
  73.     strcpy(iif[6], "      ");
  74.     strcpy(ift[6], "??????");
  75.     strcpy(ifd[6], "      ");
  76.     up[6] = 18;    dn[6] = 8;    l[6] = 18;    r[6] = 8;
  77.     rmask[6] = 127;
  78. /* field 8 */
  79.     tx[7] = 39;    ty[7] = 16;    tsa[7] = 1;    tfa[7] = 0;
  80.     strcpy(title[7], "Your IP address:");
  81.     ix[7] = 57;    iy[7] = 16;    isa[7] = 7;    ifa[7] = 0;
  82.     strcpy(iif[7], "[000.000.000.000]");
  83.     strcpy(ift[7], "[###.###.###.###]");
  84.     strcpy(ifd[7], "[000.000.000.000]");
  85.     up[7] = 7;    dn[7] = 9;    l[7] = 7;    r[7] = 9;
  86.     rmask[7] = 127;
  87. /* field 9 */
  88.     tx[8] = 3;    ty[8] = 17;    tsa[8] = 1;    tfa[8] = 0;
  89.     strcpy(title[8], "Require password for remote Super-User access (y/n)?");
  90.     ix[8] = 57;    iy[8] = 17;    isa[8] = 7;    ifa[8] = 0;
  91.     strcpy(iif[8], "n");
  92.     strcpy(ift[8], "@");
  93.     strcpy(ifd[8], "n");
  94.     up[8] = 8;    dn[8] = 10;    l[8] = 8;    r[8] = 10;
  95.     rmask[8] = 127;
  96. /* field 10 */
  97.     tx[9] = 2;    ty[9] = 18;    tsa[9] = 1;    tfa[9] = 0;
  98.     strcpy(title[9], "Is there a gateway node to be used for routing (y/n)?");
  99.     ix[9] = 57;    iy[9] = 18;    isa[9] = 7;    ifa[9] = 0;
  100.     strcpy(iif[9], "y");
  101.     strcpy(ift[9], "@");
  102.     strcpy(ifd[9], "y");
  103.     up[9] = 9;    dn[9] = 19;    l[9] = 9;    r[9] = 19;
  104.     rmask[9] = 127;
  105. /* field 11 */
  106.     tx[10] = 62;    ty[10] = 6;    tsa[10] = 1;    tfa[10] = 0;
  107.     strcpy(title[10], "Use com1 (y/n)?");
  108.     ix[10] = 78;    iy[10] = 6;    isa[10] = 7;    ifa[10] = 0;
  109.     strcpy(iif[10], "y");
  110.     strcpy(ift[10], "@");
  111.     strcpy(ifd[10], "y");
  112.     up[10] = 6;    dn[10] = 12;    l[10] = 6;    r[10] = 12;
  113.     rmask[10] = 127;
  114. /* field 12 */
  115.     tx[11] = 62;    ty[11] = 7;    tsa[11] = 1;    tfa[11] = 0;
  116.     strcpy(title[11], "Use com2 (y/n)?");
  117.     ix[11] = 78;    iy[11] = 7;    isa[11] = 7;    ifa[11] = 0;
  118.     strcpy(iif[11], "n");
  119.     strcpy(ift[11], "@");
  120.     strcpy(ifd[11], "n");
  121.     up[11] = 11;    dn[11] = 13;    l[11] = 11;    r[11] = 13;
  122.     rmask[11] = 127;
  123. /* field 13 */
  124.     tx[12] = 62;    ty[12] = 8;    tsa[12] = 1;    tfa[12] = 0;
  125.     strcpy(title[12], "Use com3 (y/n)?");
  126.     ix[12] = 78;    iy[12] = 8;    isa[12] = 7;    ifa[12] = 0;
  127.     strcpy(iif[12], "n");
  128.     strcpy(ift[12], "@");
  129.     strcpy(ifd[12], "n");
  130.     up[12] = 12;    dn[12] = 14;    l[12] = 12;    r[12] = 14;
  131.     rmask[12] = 127;
  132. /* field 14 */
  133.     tx[13] = 62;    ty[13] = 9;    tsa[13] = 1;    tfa[13] = 0;
  134.     strcpy(title[13], "Use com4 (y/n)?");
  135.     ix[13] = 78;    iy[13] = 9;    isa[13] = 7;    ifa[13] = 0;
  136.     strcpy(iif[13], "n");
  137.     strcpy(ift[13], "@");
  138.     strcpy(ifd[13], "n");
  139.     up[13] = 13;    dn[13] = 15;    l[13] = 13;    r[13] = 15;
  140.     rmask[13] = 127;
  141. /* field 15 */
  142.     tx[14] = 61;    ty[14] = 10;    tsa[14] = 1;    tfa[14] = 0;
  143.     strcpy(title[14], "DRSI ch 1 (y/n)?");
  144.     ix[14] = 78;    iy[14] = 10;    isa[14] = 7;    ifa[14] = 0;
  145.     strcpy(iif[14], "n");
  146.     strcpy(ift[14], "@");
  147.     strcpy(ifd[14], "n");
  148.     up[14] = 14;    dn[14] = 16;    l[14] = 14;    r[14] = 16;
  149.     rmask[14] = 127;
  150. /* field 16 */
  151.     tx[15] = 61;    ty[15] = 11;    tsa[15] = 1;    tfa[15] = 0;
  152.     strcpy(title[15], "DRSI ch 2 (y/n)?");
  153.     ix[15] = 78;    iy[15] = 11;    isa[15] = 7;    ifa[15] = 0;
  154.     strcpy(iif[15], "n");
  155.     strcpy(ift[15], "@");
  156.     strcpy(ifd[15], "n");
  157.     up[15] = 15;    dn[15] = 17;    l[15] = 15;    r[15] = 17;
  158.     rmask[15] = 127;
  159. /* field 17 */
  160.     tx[16] = 60;    ty[16] = 12;    tsa[16] = 1;    tfa[16] = 0;
  161.     strcpy(title[16], "PC100 ch 1 (y/n)?");
  162.     ix[16] = 78;    iy[16] = 12;    isa[16] = 7;    ifa[16] = 0;
  163.     strcpy(iif[16], "n");
  164.     strcpy(ift[16], "@");
  165.     strcpy(ifd[16], "n");
  166.     up[16] = 16;    dn[16] = 18;    l[16] = 16;    r[16] = 18;
  167.     rmask[16] = 127;
  168. /* field 18 */
  169.     tx[17] = 60;    ty[17] = 13;    tsa[17] = 1;    tfa[17] = 0;
  170.     strcpy(title[17], "PC100 ch 2 (y/n)?");
  171.     ix[17] = 78;    iy[17] = 13;    isa[17] = 7;    ifa[17] = 0;
  172.     strcpy(iif[17], "n");
  173.     strcpy(ift[17], "@");
  174.     strcpy(ifd[17], "n");
  175.     up[17] = 17;    dn[17] = 7;    l[17] = 17;    r[17] = 7;
  176.     rmask[17] = 127;
  177. /* field 19 */
  178.     tx[18] = 21;    ty[18] = 19;    tsa[18] = 1;    tfa[18] = 0;
  179.     strcpy(title[18], "Is NETROM support necessary (y/n)?");
  180.     ix[18] = 57;    iy[18] = 19;    isa[18] = 7;    ifa[18] = 0;
  181.     strcpy(iif[18], "n");
  182.     strcpy(ift[18], "@");
  183.     strcpy(ifd[18], "n");
  184.     up[18] = 10;    dn[18] = 20;    l[18] = 10;    r[18] = 20;
  185.     rmask[18] = 127;
  186. /* field 20 */
  187.     tx[19] = 21;    ty[19] = 20;    tsa[19] = 1;    tfa[19] = 0;
  188.     strcpy(title[19], "Disk drive to install software on:");
  189.     ix[19] = 57;    iy[19] = 20;    isa[19] = 7;    ifa[19] = 0;
  190.     strcpy(iif[19], "c:");
  191.     strcpy(ift[19], "@:");
  192.     strcpy(ifd[19], "c:");
  193.     up[19] = 19;    dn[19] = 21;    l[19] = 19;    r[19] = 21;
  194.     rmask[19] = 127;
  195. /* field 21 */
  196.     tx[20] = 3;    ty[20] = 21;    tsa[20] = 1;    tfa[20] = 0;
  197.     strcpy(title[20], "Directory 'path' to the software:");
  198.     ix[20] = 38;    iy[20] = 21;    isa[20] = 7;    ifa[20] = 0;
  199.     strcpy(iif[20], "\\                                       ");
  200.     strcpy(ift[20], "\\***************************************");
  201.     strcpy(ifd[20], "\\                                       ");
  202.     up[20] = 20;    dn[20] = 21;    l[20] = 20;    r[20] = 21;
  203.     rmask[20] = 127;
  204.  
  205.     nfields = 21;
  206.  
  207.     clrscr();
  208.     box(1, 1, 80, 24, 2);
  209.     addlin(1, 5, 80, 2);
  210.     addlin(1, 14, 80, 2);
  211.     addlin(1, 22, 80, 2);
  212.     puttxt(60, 1, 0, 0, TITLE);
  213.     puttxt(22, 3, 1, 0, "KA9Q (NOS) TCP/IP Software Installation");
  214.     puttxt(8, 23, 1, 0, "ESC = Quit, F1 = next screen,  = previous field,  = next field");
  215.     screen();
  216. }
  217.